﻿Namespace Users
    Public Class CompanyPreferenceVO
        Private _companyPreferenceId As Integer
        Private _companyId As Integer
        Private _preferenceId As Integer
        Private _value As String

        Sub New()
        End Sub

        Sub New(entity As Data.BaseModel.CompanyPreference)
            If entity IsNot Nothing Then
                companyPreferenceId = entity.CompanyPreferenceId
                companyId = entity.CompanyId
                preferenceId = entity.PreferenceId
                value = entity.Value
            End If
        End Sub

        Public Property companyPreferenceId As Integer
            Get
                Return _companyPreferenceId
            End Get
            Set(value As Integer)
                _companyPreferenceId = value
            End Set
        End Property

        Public Property companyId As Integer
            Get
                Return _companyId
            End Get
            Set(value As Integer)
                _companyId = value
            End Set
        End Property

        Public Property preferenceId As Integer
            Get
                Return _preferenceId
            End Get
            Set(value As Integer)
                _preferenceId = value
            End Set
        End Property

        Public Property value As String
            Get
                Return _value
            End Get
            Set(value As String)
                _value = value
            End Set
        End Property

    End Class

End Namespace